home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / fb386 / tool / watanabe / sprite / scr_ch.bas < prev   
BASIC Source File  |  1995-01-19  |  3KB  |  63 lines
  1. 55000 '*********************************************************************
  2. 55010 '                  プログラム開発支援シリーズ第６弾
  3. 55020 '
  4. 55030 '                スプライト画面モード変更ルーチン
  5. 55040 '
  6. 55050 '                                   1995年１月６日（金） by 渡辺 良一
  7. 55060 '*********************************************************************
  8. 55070 *SCREEN_16
  9. 55080   OUT &H440,&H10,2:OUT &H442,&H0406,2 'vde1
  10. 55090   OUT &H440,&H1B,2:OUT &H442,&H1100,2 'zoom
  11. 55100   OUT &H440,&H0F,2:OUT &H442,&H0046,2 'vds1（標準）
  12. 55110   'OUT &H440,&H0F,2:OUT &H442,&H003D,2 'vds1（上部２ライン表示）
  13. 55120   RETURN
  14. 55130   '
  15. 55140 *SCREEN_32K
  16. 55150   OUT &H440,&H0D,2:OUT &H442,&H0046,2 'vds0
  17. 55160   OUT &H440,&H0E,2:OUT &H442,&H0406,2 'vde0
  18. 55170   OUT &H440,&H0F,2:OUT &H442,&H0046,2 'vds1（標準）
  19. 55180   'OUT &H440,&H0F,2:OUT &H442,&H003D,2 'vds1（上部２ライン表示）
  20. 55190   OUT &H440,&H10,2:OUT &H442,&H0416,2 'vde1
  21. 55200   OUT &H440,&H08,2:OUT &H442,&H0419,2 'vst
  22. 55210   OUT &H440,&H1B,2:OUT &H442,&H1111,2 'zoom
  23. 55220   RETURN
  24. 55230   '
  25. 55240 *標準
  26. 55250   OUT &H440,&H00,2:OUT &H442,&H0060,2 'hsw1
  27. 55260   OUT &H440,&H01,2:OUT &H442,&H02C0,2 'hsw2
  28. 55270   OUT &H440,&H04,2:OUT &H442,&H031F,2 'hst
  29. 55280   OUT &H440,&H1D,2:OUT &H442,&H0002,2 'cr1
  30. 55290   '
  31. 55300   'グラフィック画面の表示領域指定（標準位置）
  32. 55310   'OUT &H440,&H09,2:OUT &H442,&H008A,2 'hds0
  33. 55320   'OUT &H440,&H0A,2:OUT &H442,&H030A,2 'haj0
  34. 55330   'OUT &H440,&H12,2:OUT &H442,&H008A,2 'hde0
  35. 55340   '
  36. 55350   'グラフィック画面の表示領域指定（グラフィックとスプライト一致）
  37. 55360   OUT &H440,&H09,2:OUT &H442,&H008A+SCREEN_X*2,2 'hds0
  38. 55370   OUT &H440,&H0A,2:OUT &H442,&H028A+SCREEN_X*2,2 'haj0
  39. 55380   OUT &H440,&H12,2:OUT &H442,&H008A+SCREEN_X*2,2 'hde0
  40. 55390   '
  41. 55400   'スプライト画面の表示領域指定
  42. 55410   OUT &H440,&H0B,2:OUT &H442,&H008A+SCREEN_X*2,2 'hds1
  43. 55420   OUT &H440,&H0C,2:OUT &H442,&H028A+SCREEN_X*2,2 'haj1
  44. 55430   OUT &H440,&H16,2:OUT &H442,&H008A+SCREEN_X*2,2 'hde1
  45. 55440   RETURN
  46. 55450   '
  47. 55460 *横長
  48. 55470   OUT &H440,&H00,2:OUT &H442,&H0050,2 'hsw1
  49. 55480   OUT &H440,&H01,2:OUT &H442,&H024E,2 'hsw2
  50. 55490   OUT &H440,&H04,2:OUT &H442,&H029D,2 'hst
  51. 55500   OUT &H440,&H1D,2:OUT &H442,&H0003,2 'cr1
  52. 55510   '
  53. 55520   'グラフィック画面の表示領域指定
  54. 55530   OUT &H440,&H09,2:OUT &H442,&H007C,2 'hds0
  55. 55540   OUT &H440,&H0A,2:OUT &H442,&H027C,2 'haj0
  56. 55550   OUT &H440,&H12,2:OUT &H442,&H007C,2 'hde0
  57. 55560   '
  58. 55570   'スプライト画面の表示領域指定
  59. 55580   OUT &H440,&H0B,2:OUT &H442,&H007C,2 'hds1
  60. 55590   OUT &H440,&H0C,2:OUT &H442,&H027C,2 'haj1
  61. 55600   OUT &H440,&H16,2:OUT &H442,&H007C,2 'hde1
  62. 55610   RETURN
  63.